#define _CRT_SECURE_NO_WARNINGS 1
#include"slist.h"

SListNode* BuyListNode(SLTDateType x)
{
	SListNode* node = (SListNode*)malloc(sizeof(SListNode));
	if (!node)
		perror("malloc fail");
	node->next = NULL;
	node->val = x;
	return node;
}


void SListPrint(SListNode* phead)
{
	SListNode* cur = phead;
	while (cur)
	{
		printf("%d->", cur->val);
		cur = cur->next;
	}
	printf("NULL\n");
}


void SListPushBack(SListNode** pphead, SLTDateType x)
{
	assert(pphead);
	SListNode* newnode = BuyListNode(x);
	if (*pphead == NULL)
	{
		*pphead = newnode;
	}
	else
	{
		SListNode* tail = *pphead;
		while (tail->next != NULL)
		{
			tail = tail->next;
		}
		tail->next = newnode;
	}
}


void SListPushFront(SListNode** pphead, SLTDateType x)
{
	assert(pphead);
	SListNode* newnode = BuyListNode(x);
	newnode->next = *pphead;
	*pphead = newnode;
}

void SListPopBack(SListNode** pphead)
{
	assert(pphead);
	assert(*pphead);
	SListNode* cur = *pphead;
	if (cur->next)
	{
		while (cur->next->next != NULL)
		{
			cur = cur->next;
		}
		SListNode* tmp = cur->next;
		cur->next = NULL;
		free(tmp);
	}
	else
	{
		free(cur);
		*pphead = NULL;
	}

}

void SListPopFront(SListNode** pphead)
{
	assert(pphead);
	assert(*pphead);
	SListNode* tmp = *pphead;
	*pphead = (*pphead)->next;
	free(tmp);
}


SListNode* SListFind(SListNode** pphead, SLTDateType x)
{
	assert(pphead);
	if (*pphead)
	{
		SListNode* cur = *pphead;
		while (cur)
		{
			if (cur->val == x)
				return cur;
			cur = cur->next;
		}
	}
	return NULL;
}

void SListInsertAfter(SListNode* pos, SLTDateType x)
{
	assert(pos);
	SListNode* newnode = BuyListNode(x);
	newnode->next = pos->next;
	pos->next = newnode;
}

void SListEraseAfter(SListNode* pos)
{
	assert(pos);
	SListNode* next = pos->next;
	if (next)
	{
		pos->next = pos->next->next;
		free(next);
	}
}

void SListInsert(SListNode** pphead, SListNode* pos, SLTDateType x)
{
	assert(pphead);
	assert(pos);
	if (*pphead == pos) return SListPushFront(pphead, x);
	SListNode* cur = *pphead;
	SListNode* newnode = BuyListNode(x);
	while (cur->next != pos)
	{
		cur = cur->next;
	}
	newnode->next = pos;
	cur->next = newnode;
}

void SListErase(SListNode** pphead, SListNode* pos)
{
	assert(pphead);
	assert(pos);
	SListNode* cur = *pphead;
	if (*pphead == pos) return SListPopFront(pphead);
	else
	{
		while (cur->next != pos)
		{
			cur = cur->next;
		}
		cur->next = pos->next;
		free(pos);
	}
}
void SListErase(SListNode** pphead, SListNode* pos)
{
	assert(pphead);
	assert(pos);
	SListNode* cur = *pphead;
	if (*pphead == pos) return SListPopFront(pphead);
	else
	{
		while (cur->next != pos)
		{
			cur = cur->next;
		}
		cur->next = pos->next;
		free(pos);
	}
}


void SListDestroy(SListNode** pphead)
{
	SListNode* cur = *pphead;
	while (cur)
	{
		cur = cur->next;
		free(*pphead);
		*pphead = cur;
	}
}